home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / atassyu / townspal.cpp < prev    next >
Text File  |  1993-07-08  |  802b  |  40 lines
  1. //
  2. //    for BC++ & AFX 3.0
  3. //    Copyright (c) 1993  TESAGEKABAN KWAN Atassyu
  4. //    @TESAGEKABAN'YA UOARITEN, Tokyo 2-710845, JAPAN.
  5. //
  6. #include    <iostream.h>
  7. #include    <iomanip.h>
  8.  
  9. #include    <stdlib.h>
  10. #include    <dos.h>
  11. #include    <time.h>
  12.  
  13.  
  14. //
  15. //    参考文献：    ＯＨ！FMＴＯＷＮＳ 1993-1 p.135、ソフトバンク
  16. //                ＴｏｗｎｓＭＥＮＵのパレット設定、清原　平九郎
  17. //
  18. //
  19. int main() {
  20.     cerr
  21.         << "Atassyu/TOWNS NENU Palette[ "__DATE__" ]\n"
  22.         << "Copyright (c) 1993  TESAGEKABAN KWAN Atassyu\n"
  23.         << "@TESAGEKABAN'YA UOARITEN, Tokyo 2-710845, JAPAN."
  24.         << endl
  25.         << endl;
  26.  
  27.     randomize();
  28.     unsigned int colors = inport( 0x3B0A );
  29.     while( 1 ) {
  30.         unsigned int r = random( 0x0A );    //    0x00 .. 0x09
  31.         if( colors != r ) {
  32.             outport( 0x3B0A, r );
  33.             return    EXIT_SUCCESS;
  34.         }
  35.     }
  36. }
  37.  
  38.  
  39. //    END.
  40.